<?php


    class Image {
        protected $path;   //图片所在的路径

        
        /**
         * 创建图像对象时传递图像的一个路径，默认值是框架的文件上传目录
         * @param    string    $path    可以指定处理图片的路径
         */
        function __construct($path=""){
            if($path=="")
                $path="./public/uploads";
            $this->path=$path;
        }
        /**
         * 对指定的图像进行缩放
         * @param    string    $name    是需要处理的图片名称
         * @param    int    $width    缩放后的宽度
         * @param    int    $height    缩放后的高度
         * @param    string    $qz    是新图片的前缀
         * @return    mixed        是缩放后的图片名称,失败返回false;
         */
        function thumb($name, $width, $height,$qz="th_"){
            $imgInfo=$this->getInfo($name);                                 //获取图片信息
            $srcImg=$this->getImg($name, $imgInfo);                          //获取图片资源         
            $size=$this->getNewSize($name,$width, $height,$imgInfo);       //获取新图片尺寸
            $newImg=$this->kidOfImage($srcImg, $size,$imgInfo);   //获取新的图片资源
            return $this->createNewImage($newImg, $qz.$name,$imgInfo);    //返回新生成的缩略图的名称，以"th_"为前缀
        }
        /** 
        * 为图片添加水印
        * @param    string    $groundName    背景图片，即需要加水印的图片，暂只支持GIF,JPG,PNG格式； 
        * @param    string    $waterName    图片水印，即作为水印的图片，暂只支持GIF,JPG,PNG格式; 
        * @param    int    $waterPos    水印位置，有10种状态，0为随机位置； 
        *                     1为顶端居左，2为顶端居中，3为顶端居右； 
        *                     4为中部居左，5为中部居中，6为中部居右； 
        *                    7为底端居左，8为底端居中，9为底端居右； 
        * @param    string    $qz        加水印后的图片的文件名在原文件名前面加上这个前缀，。
        * @return    mixed            是生成水印后的图片名称,失败返回false;
        */ 
        function waterMark($groundName, $waterName, $waterPos=0, $qz="wa_"){
            $curpath=rtrim($this->path,"/")."/";
            $dir=dirname($waterName);
            if($dir=="."){
                $wpath=$curpath;
            }else{
                $wpath=$dir."/";
                $waterName=basename($waterName);
            
            }
            
    

            if(file_exists($curpath.$groundName) && file_exists($wpath.$waterName)){
                $groundInfo=$this->getInfo($groundName);               //获取背景信息
                $waterInfo=$this->getInfo($waterName, $dir);                 //获取水印图片信息

                if(!$pos=$this->position($groundInfo, $waterInfo, $waterPos)){
                    Debug::addmsg("<font color='red'>水印不应该比背景图片小！</font>");
                    return false;
                }

                $groundImg=$this->getImg($groundName, $groundInfo);    //获取背景图像资源
                $waterImg=$this->getImg($waterName, $waterInfo, $dir);       //获取水印图片资源    

                $groundImg=$this->copyImage($groundImg, $waterImg, $pos, $waterInfo);  //拷贝图像
                
                return $this->createNewImage($groundImg, $qz.$groundName, $groundInfo);
                
            }else{
                Debug::addmsg("<font color='red'>图片或水印图片不存在！</font>");
                return false;
            }
        }

        private function position($groundInfo, $waterInfo, $waterPos){
            //需要加水印的图片的长度或宽度比水印还小，无法生成水印！
            if( ($groundInfo["width"]<$waterInfo["width"]) || ($groundInfo["height"]<$waterInfo["height"]) ) { 
                return false; 
            } 
            switch($waterPos) { 
                case 1://1为顶端居左 
                    $posX = 0; 
                    $posY = 0; 
                    break; 
                case 2://2为顶端居中 
                    $posX = ($groundInfo["width"] - $waterInfo["width"]) / 2; 
                    $posY = 0; 
                    break; 
                case 3://3为顶端居右 
                    $posX = $groundInfo["width"] - $waterInfo["width"]; 
                    $posY = 0; 
                    break; 
                case 4://4为中部居左 
                    $posX = 0; 
                    $posY = ($groundInfo["height"] - $waterInfo["height"]) / 2; 
                    break; 
                case 5://5为中部居中 
                    $posX = ($groundInfo["width"] - $waterInfo["width"]) / 2; 
                    $posY = ($groundInfo["height"] - $waterInfo["height"]) / 2; 
                    break; 
                case 6://6为中部居右 
                    $posX = $groundInfo["width"] - $waterInfo["width"]; 
                    $posY = ($groundInfo["height"] - $waterInfo["height"]) / 2; 
                    break; 
                case 7://7为底端居左 
                    $posX = 0; 
                    $posY = $groundInfo["height"] - $waterInfo["height"]; 
                    break; 
                case 8://8为底端居中 
                    $posX = ($groundInfo["width"] - $waterInfo["width"]) / 2; 
                    $posY = $groundInfo["height"] - $waterInfo["height"]; 
                    break; 
                case 9://9为底端居右 
                    $posX = $groundInfo["width"] - $waterInfo["width"]; 
                    $posY = $groundInfo["height"] - $waterInfo["height"]; 
                    break; 
                case 0:
                default://随机 
                    $posX = rand(0,($groundInfo["width"] - $waterInfo["width"])); 
                    $posY = rand(0,($groundInfo["height"] - $waterInfo["height"])); 
                    break; 
            } 

            return array("posX"=>$posX, "posY"=>$posY);
        }

        
        // 获取图片的信息
        private function getInfo($name, $path=".") {
            $spath = $path=="." ? rtrim($this->path,"/")."/" : $path.'/';
            
            $data    = getimagesize($spath.$name);
            $imgInfo["width"]    = $data[0];
            $imgInfo["height"]    = $data[1];
            $imgInfo["type"]    = $data[2];

            return $imgInfo;        
        }

        // 创建图像资源 
        private function getImg($name, $imgInfo, $path='.'){
            
            $spath = $path=="." ? rtrim($this->path,"/")."/" : $path.'/';
            $srcPic=$spath.$name;
            
            switch ($imgInfo["type"]) {
                case 1:    //gif
                    $img = imagecreatefromgif($srcPic);
                    break;
                case 2:    //jpg
                    $img = imagecreatefromjpeg($srcPic);
                    break;
                case 3:    //png
                    $img = imagecreatefrompng($srcPic);
                    break;
                default:
                    return false;
                    break;
            }
            return $img;
        }
        
        //返回等比例缩放的图片宽度和高度，如果原图比缩放后的还小保持不变
        private function getNewSize($name, $width, $height,$imgInfo){    
            $size["width"]=$imgInfo["width"];          //将原图片的宽度给数组中的$size["width"]
            $size["height"]=$imgInfo["height"];        //将原图片的高度给数组中的$size["height"]
            
            if($width < $imgInfo["width"]){
                $size["width"]=$width;             //缩放的宽度如果比原图小才重新设置宽度
            }

            if($height < $imgInfo["height"]){
                $size["height"]=$height;            //缩放的高度如果比原图小才重新设置高度
            }

            if($imgInfo["width"]*$size["width"] > $imgInfo["height"] * $size["height"]){
                $size["height"]=round($imgInfo["height"]*$size["width"]/$imgInfo["width"]);
            }else{
                $size["width"]=round($imgInfo["width"]*$size["height"]/$imgInfo["height"]);
            }

            return $size;
        }    



        private function createNewImage($newImg, $newName, $imgInfo){
            $this->path=rtrim($this->path,"/")."/";
            switch ($imgInfo["type"]) {
                   case 1:    //gif
                    $result=imageGIF($newImg, $this->path.$newName);
                    break;
                case 2:    //jpg
                    $result=imageJPEG($newImg,$this->path.$newName);  
                    break;
                case 3:    //png
                    $result=imagePng($newImg, $this->path.$newName);  
                    break;
            }
            imagedestroy($newImg);
            return $newName;
        }

        private function copyImage($groundImg, $waterImg, $pos, $waterInfo){
            imagecopy($groundImg, $waterImg, $pos["posX"], $pos["posY"], 0, 0, $waterInfo["width"],$waterInfo["height"]);
            imagedestroy($waterImg);
            return $groundImg;
        }

        private function kidOfImage($srcImg,$size, $imgInfo){
            $newImg = imagecreatetruecolor($size["width"], $size["height"]);        
            $otsc = imagecolortransparent($srcImg); //将某个颜色定义为透明色
            if( $otsc >= 0 && $otsc < imagecolorstotal($srcImg)) {  //取得一幅图像的调色板中颜色的数目
                   $transparentcolor = imagecolorsforindex( $srcImg, $otsc ); //取得某索引的颜色
                  $newtransparentcolor = imagecolorallocate(
                        $newImg,
                       $transparentcolor['red'],
                            $transparentcolor['green'],
                        $transparentcolor['blue']
                   );

                   imagefill( $newImg, 0, 0, $newtransparentcolor );
                   imagecolortransparent( $newImg, $newtransparentcolor );
            }
            imagecopyresized( $newImg, $srcImg, 0, 0, 0, 0, $size["width"], $size["height"], $imgInfo["width"], $imgInfo["height"] );
            imagedestroy($srcImg);
            return $newImg;
        }

    }



	class Fileupload extends Image{	
		private $allowtype = array('jpg','gif','png'); //限制上传文件的类型,可以使用set()设置，使用小字母
		private $maxsize = 1000000;  //限制文件上传大小，单位是字节,可以使用set()设置
		private $israndname = true;   //设置是否随机重命名 false为不随机,可以使用set()设置
		private $thumb=array();      //设置缩放图片,可以使用set()设置
		private $watermark=array();  //设置为图片加水印,可以使用set()设置
		private $originName;   	     //源文件名
		private $tmpFileName;        //临时文件名
		private $fileType; 	     //文件类型(文件后缀)
		private $fileSize;            //文件大小
		private $newFileName; 	      //新文件名
		private $errorNum = 0;        //错误号
		private $errorMess="";       //错误报告消息
		
		/**
		 * 用于设置成员属性（$path, $allowtype,$maxsize, $israndname, $thumb,$watermark）
		 * 可以通过连贯操作一次设置多个属性值
		 *@param	string	$key	成员属性名(不区分大小写)
		 *@param	mixed	$val	为成员属性设置的值
		 *@return	object		返回自己对象$this
		 */
		function set($key, $val){
			$key=strtolower($key); 
			if(array_key_exists($key,get_class_vars(get_class($this)))){
				$this->setOption($key, $val);
			}

			return $this;
		}

		/**
		 * 调用该方法上传文件
		 * @param	string	$fileFile	上传文件的表单名称 例如：<input type="file" name="myfile"> 参数则为myfile
		 * @return	bool			 如果上传成功返回数true 
		 */
		
		function upload($fileField) {
			$return=true;
			if(!$this->checkFilePath()) {//检查文件路径
				$this->errorMess=$this->getError();
				return false;
			}
			$name=$_FILES[$fileField]['name'];
			$tmp_name=$_FILES[$fileField]['tmp_name'];
			$size=$_FILES[$fileField]['size'];
			$error=$_FILES[$fileField]['error'];

		
		
			if(is_Array($name)){  //如果是多个文件上传则$file["name"]会是一个数组
				$errors=array();
				for($i = 0; $i < count($name); $i++){ 
					if($this->setFiles($name[$i],$tmp_name[$i],$size[$i],$error[$i] )) {//设置文件信息
						if(!$this->checkFileSize() || !$this->checkFileType()){
							$errors[]=$this->getError();
							$return=false;	
						}
					}else{
						$errors[]=$this->getError();
						$return=false;
					}

					if(!$return)  // 如果有问题，则重新初使化属性
						$this->setFiles();
				}
			
				if($return){
					$fileNames=array();   //存放所有上传后文件名的变量数组
		
					for($i = 0; $i < count($name);  $i++){ 
						if($this->setFiles($name[$i],$tmp_name[$i],$size[$i],$error[$i] )) {//设置文件信息
							$this->setNewFileName(); //设置新文件名
							if(!$this->copyFile()){
								$errors[]=$this->getError();
								$return=false;
							}
							$fileNames[]=$this->newFileName;
							//设置缩放
							if(!empty($this->thumb)){
								if(empty($this->thumb["prefix"]))
									$this->thumb["prefix"]="";
							
								$this->newFileName=$this->thumb($this->newFileName, $this->thumb["width"], $this->thumb["height"], $this->thumb["prefix"]);						
							}
							//设置水印
							if(!empty($this->watermark)){
								if(empty($this->watermark["prefix"]))
									$this->watermark["prefix"]="";
								$this->newFileName=$this->watermark($this->newFileName, $this->watermark["water"], $this->watermark["position"],$this->watermark["prefix"], $this->watermark["path"]);
							}
						}
											
					}
					$this->newFileName=$fileNames;
					
				}
				$this->errorMess=$errors;
				return $return;
				
			} else {
				if($this->setFiles($name,$tmp_name,$size,$error)) {//设置文件信息
					if($this->checkFileSize() && $this->checkFileType()){	
						$this->setNewFileName(); //设置新文件名
						if($this->copyFile()){ //上传文件   返回0为成功， 小于0都为错误
							if(!empty($this->thumb)){
								if(empty($this->thumb["prefix"]))
									$this->thumb["prefix"]="";
								$this->newFileName=$this->thumb($this->newFileName, $this->thumb["width"], $this->thumb["height"], $this->thumb["prefix"]);						
							}
							if(!empty($this->watermark)){
								if(empty($this->watermark["prefix"]))
									$this->watermark["prefix"]="";
								$this->newFileName=$this->watermark($this->newFileName, $this->watermark["water"], $this->watermark["position"],$this->watermark["prefix"],$this->watermark["path"]);
							}

							return true;
						}else{
							$return=false;
						}
					}else{
						$return=false;
					}
				} else {
					$return=false;	
				}

				if(!$return)
					$this->errorMess=$this->getError();

				return $return;
			}
		
		}

		/** 
		 * 获取上传后的文件名称
		 * @param	void	 没有参数
		 * @return	string 	上传后，新文件的名称
		 */
		public function getFileName(){
			return $this->newFileName;
		}

		/**
		 * 上传失败后，调用该方法则返回，上传出错信息
		 * @param	void	 没有参数
		 * @return	string 	 返回上传文件出错的信息提示
		 */
		public function getErrorMsg(){
			return $this->errorMess;
		}
		
		//设置上传出错信息
		private function getError() {
			$str = "上传文件<font color='red'>{$this->originName}</font>时出错 : ";
			switch ($this->errorNum) {
				case 4: $str .= "没有文件被上传"; break;
				case 3: $str .= "文件只有部分被上传"; break;
				case 2: $str .= "上传文件的大小超过了 HTML 表单中 MAX_FILE_SIZE 选项指定的值"; break;
				case 1: $str .= "上传的文件超过了 php.ini 中 upload_max_filesize 选项限制的值"; break;
				case -1: $str .= "未允许类型"; break;
				case -2: $str .= "文件过大,上传的文件不能超过{$this->maxsize}个字节"; break;
				case -3: $str .= "上传失败"; break;
				case -4: $str .= "建立存放上传文件目录失败，请重新指定上传目录"; break;
				case -5: $str .= "必须指定上传文件的路径"; break;
				default: $str .= "未知错误";
			}
			return $str.'<br>';
		}

		
		//设置和$_FILES有关的内容
		private function setFiles($name="", $tmp_name="", $size=0, $error=0) {
			$this->setOption('errorNum', $error);
			if($error)
				return false;
			$this->setOption('originName', $name);
			$this->setOption('tmpFileName',$tmp_name);
			$aryStr = explode(".", $name);
			$this->setOption('fileType', strtolower($aryStr[count($aryStr)-1]));
			$this->setOption('fileSize', $size);
			return true;
		}
    
		//为单个成员属性设置值
		private function setOption($key, $val) {
			$this->$key = $val;
		}

		//设置上传后的文件名称
		private function setNewFileName() {
			if ($this->israndname) {
				$this->setOption('newFileName', $this->proRandName());	
			} else{ 
				$this->setOption('newFileName', $this->originName);
			} 
		}
 		
		//检查上传的文件是否是合法的类型
		private function checkFileType() {
			if (in_array(strtolower($this->fileType), $this->allowtype)) {
				return true;
			}else {
				$this->setOption('errorNum', -1);
				return false;
			}
		}
    		//检查上传的文件是否是允许的大小
		private function checkFileSize() {
			if ($this->fileSize > $this->maxsize) {
				$this->setOption('errorNum', -2);
				return false;
			}else{
				return true;
			}
		}

		//检查是否有存放上传文件的目录
		private function checkFilePath() {
			if(empty($this->path)){
				$this->setOption('errorNum', -5);
				return false;
			}
			if (!file_exists($this->path) || !is_writable($this->path)) {
				if (!@mkdir($this->path, 0755)) {
					$this->setOption('errorNum', -4);
					return false;
				}
			}

			return true;
		}
		//设置随机文件名
		private function proRandName() {		
			$fileName=date('YmdHis')."_".rand(100,999);   //获取随机文件名	
			return $fileName.'.'.$this->fileType;    //返回文件名加原扩展名
		}
		

		//复制上传文件到指定的位置
		private function copyFile() {
			if(!$this->errorNum) {
				$path = rtrim($this->path, '/').'/';
				$path .= $this->newFileName;
				if (@move_uploaded_file($this->tmpFileName, $path)) {
					return true;
				}else{
					$this->setOption('errorNum', -3);
					return false;
				}
			} else {
				return false;
			}
		
		}
		
	}
